home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Monster Media 1996 #15
/
Monster Media Number 15 (Monster Media)(July 1996).ISO
/
prog_d
/
pytheas.zip
/
PP.DFM
/
PP.txt
Wrap
Text File
|
1996-03-28
|
23KB
|
650 lines
object PalPageFrm: TPalPageFrm
Left = 395
Top = 419
Width = 449
Height = 100
Caption = 'Pytheas - The Navigator'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
KeyPreview = True
PixelsPerInch = 96
ShowHint = True
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
OnMouseDown = FormMouseDown
OnShow = FormShow
TextHeight = 16
object NBK: TNotebook
Left = 0
Top = 0
Width = 441
Height = 32
Align = alClient
TabOrder = 0
OnMouseDown = FormMouseDown
object TPage
Left = 0
Top = 0
Caption = 'System'
object SCB0: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
Align = alClient
TabOrder = 0
OnMouseDown = FormMouseDown
object LeftPanel: TPanel
Left = 0
Top = 0
Width = 161
Height = 30
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object GlpyhProBtn: TSpeedButton
Tag = 1
Left = 0
Top = 0
Width = 28
Height = 28
Hint = 'Glyph Manager'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333300333
33333333333773FF333333333330F0033333333333373773FF333333330FFFF0
03333333337F333773FF3333330FFFFFF003333333733FF33773333330FF00FF
FF80333337F3773F3337333330FFFF0FFFF03FFFF7FFF3733F3700000000FFFF
0FF0777777773FF373370000000000FFFFF07FFFFFF377FFF3370CCCCC000000
FF037777773337773F7300CCC000003300307F77733337F37737000C00000033
33307F373333F7F333370000007B703333307FFFF337F7F33337099900BBB033
33307777F37777FF33370999007B700333037777F3373773FF73099900000030
00337777FFFFF7F77733000000000033333377777777773333330000}
NumGlyphs = 2
OnClick = GlpyhProBtnClick
OnMouseMove = SB1Move
end
object btnApply: TSpeedButton
Tag = 2
Left = 31
Top = 0
Width = 28
Height = 28
Hint = 'Apply Selected Bitmap'
Enabled = False
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033BBBBBBBBBB
BB33337777777777777F33BB00BBBBBBBB33337F77333333F37F33BB0BBBBBB0
BB33337F73F33337FF7F33BBB0BBBB000B33337F37FF3377737F33BBB00BB00B
BB33337F377F3773337F33BBBB0B00BBBB33337F337F7733337F33BBBB000BBB
BB33337F33777F33337F33EEEE000EEEEE33337F3F777FFF337F33EE0E80000E
EE33337F73F77773337F33EEE0800EEEEE33337F37377F33337F33EEEE000EEE
EE33337F33777F33337F33EEEEE00EEEEE33337F33377FF3337F33EEEEEE00EE
EE33337F333377F3337F33EEEEEE00EEEE33337F33337733337F33EEEEEEEEEE
EE33337FFFFFFFFFFF7F33EEEEEEEEEEEE3333777777777777730000}
NumGlyphs = 2
OnClick = btnApplyClick
OnMouseMove = SB1Move
end
object sbProc: TSpeedButton
Tag = 3
Left = 62
Top = 0
Width = 28
Height = 28
Hint = 'Find Procedures/Functions'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333300000000
0000333377777777777733330FFFFFFFFFF033337F3FFF3F3FF733330F000F0F
00F033337F777373773733330FFFFFFFFFF033337F3FF3FF3FF733330F00F00F
00F033337F773773773733330FFFFFFFFFF033337FF3333FF3F7333300FFFF00
F0F03333773FF377F7373330FB00F0F0FFF0333733773737F3F7330FB0BF0FB0
F0F0337337337337373730FBFBF0FB0FFFF037F333373373333730BFBF0FB0FF
FFF037F3337337333FF700FBFBFB0FFF000077F333337FF37777E0BFBFB000FF
0FF077FF3337773F7F37EE0BFB0BFB0F0F03777FF3733F737F73EEE0BFBF00FF
00337777FFFF77FF7733EEEE00000000033377777777777773330000}
NumGlyphs = 2
OnClick = sbProcClick
OnMouseMove = SB1Move
end
object btnListComp: TSpeedButton
Tag = 4
Left = 93
Top = 0
Width = 28
Height = 28
Hint = 'List of Components'
Enabled = False
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
333337F373F773333333303330033333333337F3377333333333303333333333
333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
333337777F337F33333330330BB00333333337F373F773333333303330033333
333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
333377777F77377733330BBB0333333333337F337F33333333330BB003333333
333373F7733333333333300333333333333337733333333333330000}
NumGlyphs = 2
OnClick = btnListCompClick
OnMouseMove = SB1Move
end
object btnReload: TSpeedButton
Tag = 6
Left = 124
Top = 0
Width = 28
Height = 28
Hint = 'ReLoad Current File.'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
000333FFF3777777777F3000330FFFFFFF033777FF7F3FF3FF7F07B7030F00F0
0F0377777F7F7737737F0BBB030FFFFFFF0377777F7F3FFFF37F07B7030F0000
FF037777737F7777337F3000330FFFFFFF033777337F3FF3FF7F3333330F00F0
00033333337F7737777F3333330FFFF0FF033FFFFF7F3FF7F3730000030F08F0
F03377777F7F7737F7330999030FFFF0033377777F7FFFF77333099903000000
333377777F7777773333099903333333333377777F33FFFFFFF3000003300000
00337777733777777733333333330CCC033333333333777773333333333330C0
3333333333333777333333333333330333333333333333733333}
NumGlyphs = 2
OnClick = btnReloadClick
OnMouseMove = SB1Move
end
end
object MiddlePanel: TPanel
Left = 161
Top = 0
Width = 186
Height = 30
Align = alClient
BevelOuter = bvNone
TabOrder = 1
OnEnter = CBEnter
OnResize = MiddlePanelResize
object CB: TComboBox
Tag = 10
Left = 2
Top = 3
Width = 152
Height = 24
Hint = 'Select all Components on a Form with '
Color = clBtnFace
ItemHeight = 16
Items.Strings = (
'fld'
'Label'
'qry'
'sh'
'tbl')
TabOrder = 0
OnClick = CBClick
OnEnter = CBEnter
OnKeyDown = CBKeyDown
end
end
object RightPanel: TPanel
Left = 347
Top = 0
Width = 92
Height = 30
Align = alRight
BevelOuter = bvNone
TabOrder = 2
object SettingsBtn: TSpeedButton
Tag = 5
Left = 2
Top = 0
Width = 28
Height = 28
Hint = 'Settings'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5000555555555555577755555555555550B0555555555555F7F7555555555550
00B05555555555577757555555555550B3B05555555555F7F557555555555000
3B0555555555577755755555555500B3B0555555555577555755555555550B3B
055555FFFF5F7F5575555700050003B05555577775777557555570BBB00B3B05
555577555775557555550BBBBBB3B05555557F555555575555550BBBBBBB0555
55557F55FF557F5555550BB003BB075555557F577F5575F5555577B003BBB055
555575F7755557F5555550BB33BBB0555555575F555557F555555507BBBB0755
55555575FFFF77555555555700007555555555577777755555550000}
NumGlyphs = 2
OnClick = SettingsBtnClick
OnMouseMove = SB1Move
end
object AboutBtn: TSpeedButton
Left = 32
Top = 0
Width = 28
Height = 28
Hint = 'About Dialog'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
0000377777777777777707FFFFFFFFFFFF70773FF33333333F770F77FFFFFFFF
77F07F773FF3333F77370FFF77FFFF77FFF07F33773FFF7733370FFFFF0000FF
FFF07F333F77773FF3F70FFF70EEEE07F9F07F3F7733337737F70F707FFFFFF7
97F07F7733333FFF7737007EEEE3000EE70977FFFFFF777FFF37077777307080
77907777777737377773307EE307088809033773FF7F7FF37733337030070088
07333337777F77377FFF33337008080809993333377F7F737777333330080088
03333333377F77337FF333333308088809333333337373F3773F333333308080
33933333333737F73373333333330003333933333333777333370000}
NumGlyphs = 2
OnClick = AboutBtnClick
OnMouseDown = AboutBtnMouseDown
OnMouseMove = SB1Move
OnMouseUp = AboutBtnMouseUp
end
object HelpBtn: TSpeedButton
Left = 61
Top = 0
Width = 28
Height = 28
Hint = 'Help.....'
Glyph.Data = {
56070000424D5607000000000000360400002800000028000000140000000100
0800000000002003000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
0303030303030303030303030303030303030303030303FFFF03030303030303
030303030303030303030606030303030303030303030303030303030303F8F8
03FF030303030303030303030303030303060404060303030303030303030303
0303030303F8FF03F8FF030303030303030303030303030303FE060604030303
03030303030303030303030303F803FFF8030303030303030303030303030303
0303FE06060303030303030303030303030303030303F8F80303030303030303
03030303030303030303030303030303030303030303030303030303030303FF
FF03030303030303030303030303030303030404060303030303030303030303
030303030303F8F803FF03030303030303030303030303030306060604030303
03030303030303030303030303F8FF03F8FF0303030303030303030303030303
03FE06060403030303030303030303030303030303F8FF03F803FF0303030303
030303030303030303FE06060604030303030303030303030303030303F803FF
03F803FF0303030303030303030303030303FE06060604030303030303030303
030303030303F803FF03F803FF0303030303030303030303030303FE06060604
030303030303030303030303FFFF03F803FF03F803FF03030303030303030304
04030303FE0606060403030303030303030303F8F803FF03F803FF03F8FF0303
03030303030306060604030303FE060604030303030303030303F8FF03F803FF
FFF80303F8FF0303030303030303FE0606060404040606060403030303030303
0303F803FF03F8F8F8030303F8FF030303030303030303FE0606060606060606
0603030303030303030303F803FFFF0303030303F80303030303030303030303
FEFE060606060606030303030303030303030303F8F803FFFFFFFFF803030303
03030303030303030303FEFEFEFEFE030303030303030303030303030303F8F8
F8F8F80303030303030303030303030303030303030303030303030303030303
0303030303030303030303030303030303030303030303030303030303030303
0303030303030303030303030303030303030303030303030303}
NumGlyphs = 2
OnClick = HelpBtnClick
OnMouseMove = SB1Move
end
end
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page1'
object SCB1: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
Align = alClient
TabOrder = 0
OnMouseDown = FormMouseDown
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page2'
object SCB2: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
Align = alClient
TabOrder = 0
OnMouseDown = FormMouseDown
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page3'
object SCB3: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
Align = alClient
TabOrder = 0
OnMouseDown = FormMouseDown
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page4'
object SCB4: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
Align = alClient
TabOrder = 0
OnMouseDown = FormMouseDown
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page5'
object SCB5: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
Align = alClient
TabOrder = 0
OnMouseDown = FormMouseDown
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page6'
object SCB6: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
Align = alClient
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page7'
object SCB7: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
Align = alClient
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page8'
object SCB8: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
Align = alClient
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page9'
object SCB9: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
Align = alClient
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page10'
object SCB10: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
Align = alClient
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page11'
object SCB11: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
Align = alClient
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page12'
object SCB12: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
Align = alClient
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page13'
object SCB13: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
Align = alClient
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page14'
object SCB14: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
Align = alClient
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'Page15'
object SCB15: TScrollBox
Left = 0
Top = 0
Width = 441
Height = 32
Align = alClient
TabOrder = 0
end
end
end
object TabSet1: TTabSet
Left = 0
Top = 32
Width = 441
Height = 21
Align = alBottom
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Tabs.Strings = (
'System'
'Default')
TabIndex = 0
OnChange = TabSet1Change
OnDragDrop = TabSet1DragDrop
OnDragOver = TabSet1DragOver
OnMouseDown = FormMouseDown
end
object Panel1: TPanel
Left = 0
Top = 53
Width = 441
Height = 20
Align = alBottom
BevelInner = bvRaised
BevelOuter = bvLowered
BorderWidth = 1
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnMouseDown = FormMouseDown
end
object ppMenu: TPopupMenu
Left = 295
Top = 37
object mmSaveSettings: TMenuItem
Caption = '&Save Settings'
OnClick = mmSaveSettingsClick
end
object N1: TMenuItem
Caption = '-'
end
object mmInsertButton: TMenuItem
Caption = '&Insert Button'
OnClick = mmInsertButtonClick
end
object mmChgBtn: TMenuItem
Caption = 'Change &Buttons'
end
object N3: TMenuItem
Caption = '-'
end
object mmNewPage: TMenuItem
Caption = '&New Page'
OnClick = mmNewPageClick
end
object mmRemovePage: TMenuItem
Caption = '&Remove Page'
OnClick = mmRemovePageClick
end
object mmChgPositions: TMenuItem
Caption = '&Change Positions'
OnClick = mmChgPositionsClick
end
object ChangePageName1: TMenuItem
Caption = 'Change &Page Name'
OnClick = ChangePageName1Click
end
object N2: TMenuItem
Caption = '-'
end
object mmExit: TMenuItem
Caption = 'E&xit'
OnClick = mmExitClick
end
end
object ppBtnMenu: TPopupMenu
Left = 265
Top = 36
object mmEditProperties: TMenuItem
Caption = 'Edit Properties'
OnClick = mmEditPropertiesClick
end
object N4: TMenuItem
Caption = '-'
end
object mmRemoveBtn: TMenuItem
Caption = 'Remove Button'
OnClick = mmRemoveBtnClick
end
end
end